﻿Public Class CChiTietDiemMonHocCRT
    Private _MaChiTietDiemMonHoc, _MaHocSinh, _MaDiemMonHoc, _MaLop, _MaMonHoc, _TenHocKy As Integer
    Private _Diem15, _Diem1Tiet, _DiemCuoiHocKy, _DiemTB As Single
    Private _HoTen As String

    Public Property HoTen()
        Get
            Return _HoTen
        End Get
        Set(ByVal value)
            _HoTen = value
        End Set
    End Property

    Public Property DiemTB()
        Get
            Return _DiemTB
        End Get
        Set(ByVal value)
            _DiemTB = value
        End Set
    End Property

    Public Property MaChiTietDiemMonHoc()
        Get
            Return _MaChiTietDiemMonHoc
        End Get
        Set(ByVal value)
            _MaChiTietDiemMonHoc = value
        End Set
    End Property

    Public Property MaHocSinh()
        Get
            Return _MaHocSinh
        End Get
        Set(ByVal value)
            _MaHocSinh = value
        End Set
    End Property

    Public Property MaDiemMonHoc()
        Get
            Return _MaDiemMonHoc
        End Get
        Set(ByVal value)
            _MaDiemMonHoc = value
        End Set
    End Property

    Public Property Diem15()
        Get
            Return _Diem15
        End Get
        Set(ByVal value)
            _Diem15 = value
        End Set
    End Property

    Public Property Diem1Tiet()
        Get
            Return _Diem1Tiet
        End Get
        Set(ByVal value)
            _Diem1Tiet = value
        End Set
    End Property

    Public Property MaLop()
        Get
            Return _MaLop
        End Get
        Set(ByVal value)
            _MaLop = value
        End Set
    End Property

    Public Property MaMonHoc()
        Get
            Return _MaMonHoc
        End Get
        Set(ByVal value)
            _MaMonHoc = value
        End Set
    End Property

    Public Property TenHocKy()
        Get
            Return _TenHocKy
        End Get
        Set(ByVal value)
            _TenHocKy = value
        End Set
    End Property

    Public Property DiemCuoiHocKy()
        Get
            Return _DiemCuoiHocKy
        End Get
        Set(ByVal value)
            _DiemCuoiHocKy = value
        End Set
    End Property

    Public Sub New()
        _MaHocSinh = 0
        _DiemTB = 0
        _MaChiTietDiemMonHoc = 0
        _MaDiemMonHoc = 0
        _Diem15 = 0
        _Diem1Tiet = 0
        _DiemCuoiHocKy = 0
        _MaLop = 0
        _MaMonHoc = 0
        _TenHocKy = 0
        _HoTen = ""
    End Sub
End Class
